home *** CD-ROM | disk | FTP | other *** search
/ Apple II Magazines (DO) / Softdisk Magazette Volume 2, No. 01 (1982-09)(Softdisk)(Side A).zip / Softdisk Magazette Volume 2, No. 01 (1982-09)(Softdisk)(Side A).do / BASICALC.DOC.bas < prev    next >
BASIC Source File  |  1996-12-24  |  26KB  |  323 lines

  1. 10  REM  BASICALC DOCUMENTATION
  2. 20 P = 1: GOTO 200
  3. 100  NORMAL : PRINT "--> FORWARD  BACK <--   <ESC> MENU (";P;")";
  4. 105  GET A$
  5. 110  IF  ASC(A$) = 8  THEN P = P -1: GOTO 140
  6. 120  IF  ASC(A$) = 21  THEN P = P +1: GOTO 140
  7. 130  IF  ASC(A$) = 27  THEN  HOME : PRINT : PRINT  CHR$(4);"RUNMENU"
  8. 135  GOTO 105
  9. 140  IF P = 0  THEN P = 12
  10. 150  IF P >12  THEN P = 1
  11. 200  ON P GOTO 300,560,820,1080,1340,1600,1860,2120,2380,2640,2900,3160
  12. 300  HOME : INVERSE 
  13. 310  HOME 
  14. 320  PRINT "                                        ";
  15. 330  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  16. 340  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  17. 350  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  18. 360  PRINT " ";: NORMAL : PRINT "               ";: INVERSE : PRINT "BASICALC";: NORMAL : PRINT "               ";: INVERSE : PRINT " ";
  19. 370  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  20. 380  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  21. 390  PRINT " ";: NORMAL : PRINT "             AN APPLESOFT             ";: INVERSE : PRINT " ";
  22. 400  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  23. 410  PRINT " ";: NORMAL : PRINT "         SPREADSHEET  PROGRAM         ";: INVERSE : PRINT " ";
  24. 420  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  25. 430  PRINT " ";: NORMAL : PRINT "        BY WILLIAM V. R. SMITH        ";: INVERSE : PRINT " ";
  26. 440  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  27. 450  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  28. 460  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  29. 470  PRINT " ";: NORMAL : PRINT "           DOCUMENTATION BY           ";: INVERSE : PRINT " ";
  30. 480  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  31. 490  PRINT " ";: NORMAL : PRINT "             DAVID DURKEE             ";: INVERSE : PRINT " ";
  32. 500  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  33. 510  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  34. 520  PRINT " ";: NORMAL : PRINT "       A PUBLICATION OF SOFTALK       ";: INVERSE : PRINT " ";
  35. 530  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  36. 540  PRINT "                                        ";
  37. 550  GOTO 100
  38. 560  HOME : NORMAL 
  39. 570  HOME 
  40. 580  PRINT "A1                                     !";
  41. 590  PRINT "                                        ";
  42. 600  PRINT "                                        ";
  43. 610  PRINT "";: INVERSE : PRINT "       A        B        C        D     ";
  44. 620  PRINT " 1          ";: NORMAL : PRINT "                            ";
  45. 630  PRINT "";: INVERSE : PRINT " 2";: NORMAL : PRINT "                                      ";
  46. 640  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "                                      ";
  47. 650  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "                                      ";
  48. 660  PRINT "";: INVERSE : PRINT " 5";: NORMAL : PRINT "                                      ";
  49. 670  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "      THIS IS THE BASICALC SCREEN     ";
  50. 680  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "   WHICH GREETS YOU WHEN YOU RUN THE  ";
  51. 690  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "   PROGRAM. WE WILL REFER TO THE TOP  ";
  52. 700  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "   THREE LINES OF THE SCREEN AS THE   ";
  53. 710  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "   CONTROL AREA.                      ";
  54. 720  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "      THE HORIZONTAL AND VERTICAL     ";
  55. 730  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "   AXES- THE INVERSE LINES WITH THE   ";
  56. 740  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "   LETTERS AND NUMBERS- DEFINE THE    ";
  57. 750  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "   SPREADSHEET AREA AND TELL YOU THE  ";
  58. 760  PRINT "";: INVERSE : PRINT "15";: NORMAL : PRINT "   CURSOR'S POSITION ON THE SCREEN.   ";
  59. 770  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "                                      ";
  60. 780  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "                                      ";
  61. 790  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "                                      ";
  62. 800  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "                                      ";
  63. 810  GOTO 100
  64. 820  HOME : NORMAL 
  65. 830  HOME 
  66. 840  PRINT "A1                                     !";
  67. 850  PRINT " \                                    / ";
  68. 860  PRINT "  \                                  /  ";
  69. 870  PRINT "";: INVERSE : PRINT "   \   A        B        C        D /   ";
  70. 880  PRINT " 1  \       ";: NORMAL : PRINT "                       /    ";
  71. 890  PRINT "";: INVERSE : PRINT " 2";: NORMAL : PRINT "   \    \                       /     ";
  72. 900  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "    \  THIS IS THE CURSOR      /      ";
  73. 910  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "     \                        /       ";
  74. 920  PRINT "";: INVERSE : PRINT " 5";: NORMAL : PRINT "      \                      /        ";
  75. 930  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "  THIS IS THE       THIS IS THE       ";
  76. 940  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "  CURSOR POSITION   CURSOR DIRECTION  ";
  77. 950  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "  INDICATOR. IT IS  INDICATOR.        ";
  78. 960  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "  USED IN YOUR                        ";
  79. 970  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "  ARITHMETIC        ! MEANS THAT <--  ";
  80. 980  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "  EXPRESSIONS AS      IS UP AND -->   ";
  81. 990  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "  A VARIABLE NAME.    IS DOWN.        ";
  82. 1000  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "                                      ";
  83. 1010  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "  THE LEFT AND      - MEANS THAT <--  ";
  84. 1020  PRINT "";: INVERSE : PRINT "15";: NORMAL : PRINT "  RIGHT ARROWS ARE    IS LEFT AND --> ";
  85. 1030  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "  USED TO MOVE THE    IS RIGHT.       ";
  86. 1040  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "  CURSOR AS                           ";
  87. 1050  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "  EXPLAINED TO THE  IT IS TOGGLED WITH";
  88. 1060  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "  RIGHT.            THE SPACE BAR.    ";
  89. 1070  GOTO 100
  90. 1080  HOME : NORMAL 
  91. 1090  HOME 
  92. 1100  PRINT "J69                                    -";
  93. 1110  PRINT "  \                                     ";
  94. 1120  PRINT "   \                                    ";
  95. 1130  PRINT "";: INVERSE : PRINT "    \  G        H        I        J     ";
  96. 1140  PRINT "51";: NORMAL : PRINT "   \                                  ";
  97. 1150  PRINT "";: INVERSE : PRINT "52";: NORMAL : PRINT "    \                           ^     ";
  98. 1160  PRINT "";: INVERSE : PRINT "53";: NORMAL : PRINT "  THE NEW POSITION IS J69       !     ";
  99. 1170  PRINT "";: INVERSE : PRINT "54";: NORMAL : PRINT "                                !     ";
  100. 1180  PRINT "";: INVERSE : PRINT "55";: NORMAL : PRINT "                                !     ";
  101. 1190  PRINT "";: INVERSE : PRINT "56";: NORMAL : PRINT "                                !     ";
  102. 1200  PRINT "";: INVERSE : PRINT "57";: NORMAL : PRINT "       THE CURSOR IS NOW IN           ";
  103. 1210  PRINT "";: INVERSE : PRINT "58";: NORMAL : PRINT "    THE LOWER-RIGHT-MOST        J     ";
  104. 1220  PRINT "";: INVERSE : PRINT "59";: NORMAL : PRINT "    POSITION ON THE SPREAD-           ";
  105. 1230  PRINT "";: INVERSE : PRINT "60";: NORMAL : PRINT "    SHEET, AS WELL AS THE       !     ";
  106. 1240  PRINT "";: INVERSE : PRINT "61";: NORMAL : PRINT "    SCREEN. NOTE THAT THERE     !     ";
  107. 1250  PRINT "";: INVERSE : PRINT "62";: NORMAL : PRINT "    ARE 10 COLUMNS AND 69       !     ";
  108. 1260  PRINT "";: INVERSE : PRINT "63";: NORMAL : PRINT "    ROWS.                       !     ";
  109. 1270  PRINT "";: INVERSE : PRINT "64";: NORMAL : PRINT "                                V     ";
  110. 1280  PRINT "";: INVERSE : PRINT "65";: NORMAL : PRINT "                                      ";
  111. 1290  PRINT "";: INVERSE : PRINT "66";: NORMAL : PRINT "                HERE IS THE CURSOR    ";
  112. 1300  PRINT "";: INVERSE : PRINT "67";: NORMAL : PRINT "                             \        ";
  113. 1310  PRINT "";: INVERSE : PRINT "68";: NORMAL : PRINT "                              \       ";
  114. 1320  PRINT "";: INVERSE : PRINT "69";: NORMAL : PRINT "  <---------- 69 -------->  ";: INVERSE : PRINT "          ";
  115. 1330  GOTO 100
  116. 1340  HOME : NORMAL 
  117. 1350  HOME 
  118. 1360  PRINT "A2         THIS IS WHERE YOU           !";
  119. 1370  PRINT "APPLES ----TYPE IN AN ENTRY.            ";
  120. 1380  PRINT "                                        ";
  121. 1390  PRINT "";: INVERSE : PRINT "       A        B        C        D     ";
  122. 1400  PRINT " 1";: NORMAL : PRINT "                                      ";
  123. 1410  PRINT "";: INVERSE : PRINT " 2APPLES   ";: NORMAL : PRINT " ---WHEN YOU HIT RETURN IT   ";
  124. 1420  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "             APPEARS IN THE CURSOR.   ";
  125. 1430  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "                                      ";
  126. 1440  PRINT "";: INVERSE : PRINT " 5";: NORMAL : PRINT "                                      ";
  127. 1450  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "         ANYTHING YOU TYPE WHICH      ";
  128. 1460  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "      BEGINS WITH A LETTER OR A       ";
  129. 1470  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "      NUMBER IS ACCEPTED AS AN        ";
  130. 1480  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "      ENTRY. THERE ARE THREE TYPES    ";
  131. 1490  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "      OF ENTRIES:                     ";
  132. 1500  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "                                      ";
  133. 1510  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "    * VALUE- ANY NUMBER               ";
  134. 1520  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "                                      ";
  135. 1530  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "    * ARITHMETIC EXPRESSION- WHICH    ";
  136. 1540  PRINT "";: INVERSE : PRINT "15";: NORMAL : PRINT "         WILL BE EVALUATED- MORE LATER";
  137. 1550  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "                                      ";
  138. 1560  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "    * LABEL- LIKE THE EXAMPLE ABOVE-  ";
  139. 1570  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "         ANYTHING WHICH CAN'T BE      ";
  140. 1580  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "         INTERPRETED ANOTHER WAY      ";
  141. 1590  GOTO 100
  142. 1600  HOME : NORMAL 
  143. 1610  HOME 
  144. 1620  PRINT "C2                                     !";
  145. 1630  PRINT "B2*4 ---EXPRESSION 'UNDER' CURSOR       ";
  146. 1640  PRINT "                                        ";
  147. 1650  PRINT "";: INVERSE : PRINT "       A        B        C        D     ";
  148. 1660  PRINT " 1";: NORMAL : PRINT "                                      ";
  149. 1670  PRINT "";: INVERSE : PRINT " 2";: NORMAL : PRINT "APPLES       256.00";: INVERSE : PRINT "  1024.00";: NORMAL : PRINT "          ";
  150. 1680  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "              /        /              ";
  151. 1690  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "             /     EVALUATION         ";
  152. 1700  PRINT "";: INVERSE : PRINT " 5";: NORMAL : PRINT "     THIS IS B2.   OF B2*4            ";
  153. 1710  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "                                      ";
  154. 1720  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "                                      ";
  155. 1730  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "       WHEN AN ARITHMETIC EXPRESSION  ";
  156. 1740  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "    IS ENTERED, IT IS DISPLAYED AS    ";
  157. 1750  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "    SUCH IN THE CONTROL AREA. ITS     ";
  158. 1760  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "    VALUE IS DISPLAYED ON THE SPREAD- ";
  159. 1770  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "    SHEET.                            ";
  160. 1780  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "       NOTE THAT UNLESS OTHERWISE     ";
  161. 1790  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "    SPECIFIED, NUMBERS ARE SHOWN IN   ";
  162. 1800  PRINT "";: INVERSE : PRINT "15";: NORMAL : PRINT "    DOLLARS & CENTS FORMAT ON THE     ";
  163. 1810  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "    SPREADSHEET, BUT ON THE CONTROL   ";
  164. 1820  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "    AREA, THEY ARE SHOWN THE WAY      ";
  165. 1830  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "    THEY WERE ENTERED.                ";
  166. 1840  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "                                      ";
  167. 1850  GOTO 100
  168. 1860  HOME : NORMAL 
  169. 1870  HOME 
  170. 1880  PRINT "A5                                     !";
  171. 1890  PRINT "5.3:I --THIS IS HOW IT'S ENTERED.       ";
  172. 1900  PRINT "                                        ";
  173. 1910  PRINT "";: INVERSE : PRINT "       A        B        C        D     ";
  174. 1920  PRINT " 1";: NORMAL : PRINT "                                      ";
  175. 1930  PRINT "";: INVERSE : PRINT " 2";: NORMAL : PRINT "APPLES       256.00  1024.00          ";
  176. 1940  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "                                      ";
  177. 1950  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "                                      ";
  178. 1960  PRINT "";: INVERSE : PRINT " 5        5";: NORMAL : PRINT "    VALUE CONTROLS           ";
  179. 1970  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "             CHANGE THE WAY A VALUE   ";
  180. 1980  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "             IS DISPLAYED. THEY ARE   ";
  181. 1990  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "             APPENDED TO THE END OF A ";
  182. 2000  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "             NUMBER OR EXPRESSION, AS ";
  183. 2010  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "             IN THE ENTRY ABOVE.      ";
  184. 2020  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "                                      ";
  185. 2030  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "      :I    INTEGER FORMAT           5";
  186. 2040  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "                                      ";
  187. 2050  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "      :$    MONEY (DEFAULT)       5.30";
  188. 2060  PRINT "";: INVERSE : PRINT "15";: NORMAL : PRINT "                                      ";
  189. 2070  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "      :F    FLOATING POINT         5.3";
  190. 2080  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "                                      ";
  191. 2090  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "      :*    GRAPHIC MODE     *****    ";
  192. 2100  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "                                      ";
  193. 2110  GOTO 100
  194. 2120  HOME : NORMAL 
  195. 2130  HOME 
  196. 2140  PRINT "D19                                    !";
  197. 2150  PRINT "6/2*B19+C19*2:I ---THE EXPRESSION       ";
  198. 2160  PRINT "                                        ";
  199. 2170  PRINT "";: INVERSE : PRINT "       A        B        C        D     ";
  200. 2180  PRINT " 1";: NORMAL : PRINT "                                      ";
  201. 2190  PRINT "";: INVERSE : PRINT " 2";: NORMAL : PRINT "     ARITHMETIC EXPRESSIONS ARE ALWAYS";
  202. 2200  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "  EVALUATED STRICTLY FROM LEFT TO     ";
  203. 2210  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "  RIGHT. NO PARENTHESES ARE ALLOWED.  ";
  204. 2220  PRINT "";: INVERSE : PRINT " 5";: NORMAL : PRINT "  BASICALC CAN ONLY EVALUATE THE      ";
  205. 2230  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "  FOLLOWING:                          ";
  206. 2240  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "                                      ";
  207. 2250  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "     OPERATORS:   + - * /             ";
  208. 2260  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "     NUMBERS:  3  -5  18.7  ETC.      ";
  209. 2270  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "     LOCATIONS:  A1 B7 J69  ETC.      ";
  210. 2280  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "     VALUE CONTROLS:  :I :$ :F :*     ";
  211. 2290  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "                                      ";
  212. 2300  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "     THE EXPRESSION ABOVE IS EVALUATED";
  213. 2310  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "  LIKE SO: 6/2=";: INVERSE : PRINT "3";: NORMAL : PRINT " B19=6 3*6=";: INVERSE : PRINT "18";: NORMAL : PRINT " C19=2   ";
  214. 2320  PRINT "";: INVERSE : PRINT "15";: NORMAL : PRINT "  18+2=";: INVERSE : PRINT "20";: NORMAL : PRINT " 20*2=40. 40:I READS WITHOUT ";
  215. 2330  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "  DECIMAL PLACES                      ";
  216. 2340  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "                      SEE THE ANSWER? ";
  217. 2350  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "                                    \ ";
  218. 2360  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "               6.00     2.00";: INVERSE : PRINT "        40";
  219. 2370  GOTO 100
  220. 2380  HOME : NORMAL 
  221. 2390  HOME 
  222. 2400  PRINT "D14                                    !";
  223. 2410  PRINT "A12+B12+C12+D12                         ";
  224. 2420  PRINT "                                        ";
  225. 2430  PRINT "";: INVERSE : PRINT "       A        B        C        D     ";
  226. 2440  PRINT " 1";: NORMAL : PRINT "                                      ";
  227. 2450  PRINT "";: INVERSE : PRINT " 2";: NORMAL : PRINT "       YOU CANNOT USE AN EXPRESSION   ";
  228. 2460  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "    LIKE THIS ONE:                    ";
  229. 2470  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "                                      ";
  230. 2480  PRINT "";: INVERSE : PRINT " 5";: NORMAL : PRINT "    (3*6)+(8*9)+(2*5)+(30/5)          ";
  231. 2490  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "                                      ";
  232. 2500  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "       INSTEAD, YOU WOULD SET EACH    ";
  233. 2510  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "    PARENTHETICAL EXPRESSION IN A     ";
  234. 2520  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "    SEPERATE CELL, AND USE A FIFTH    ";
  235. 2530  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "    CELL TO TOTAL THEM, LIKE SO:      ";
  236. 2540  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "                                      ";
  237. 2550  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "       3*6      8*9      2*5      30/5";
  238. 2560  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "                                      ";
  239. 2570  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "                            ";: INVERSE : PRINT "    106.00";
  240. 2580  PRINT "15";: NORMAL : PRINT "                                      ";
  241. 2590  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "       SEE THE NEXT PAGE FOR AN       ";
  242. 2600  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "    EASIER WAY TO DO THE SUMMATION.   ";
  243. 2610  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "                                      ";
  244. 2620  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "                                      ";
  245. 2630  GOTO 100
  246. 2640  HOME : NORMAL 
  247. 2650  HOME 
  248. 2660  PRINT "                                        ";
  249. 2670  PRINT "         ";: INVERSE : PRINT "SINGLE KEY COMMANDS-";: NORMAL : PRINT "           ";
  250. 2680  PRINT "                                        ";
  251. 2690  PRINT "";: INVERSE : PRINT "       A        B        C        D     ";
  252. 2700  PRINT " 1";: NORMAL : PRINT "                                      ";
  253. 2710  PRINT "";: INVERSE : PRINT " 2";: NORMAL : PRINT "                                      ";
  254. 2720  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "   &  TOTALS ADJACENT CELLS IN A      ";
  255. 2730  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "      ROW OR COLUMN. YOU ENTER START  ";
  256. 2740  PRINT "";: INVERSE : PRINT " 5";: NORMAL : PRINT "      AND END POINTS.                 ";
  257. 2750  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "                                      ";
  258. 2760  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "   !  RECALCULATE. ALL EXPRESSIONS    ";
  259. 2770  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "      ARE EVALUATED WHEN THEY ARE     ";
  260. 2780  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "      ENTERED. THIS COMMAND EVALUATES ";
  261. 2790  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "      THE WHOLE SHEET STARTING FROM   ";
  262. 2800  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "      A1, MOVING LEFT TO RIGHT, ROW   ";
  263. 2810  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "      BY ROW, THE WAY YOU READ A BOOK.";
  264. 2820  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "                                      ";
  265. 2830  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "   @  CLEARS A SINGLE ANSWER CELL.    ";
  266. 2840  PRINT "";: INVERSE : PRINT "15";: NORMAL : PRINT "                                      ";
  267. 2850  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "   /  GETS YOU THE EXTENDED COMMAND   ";
  268. 2860  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "      MENU. SEE THE NEXT PAGE.        ";
  269. 2870  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "                                      ";
  270. 2880  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "                                      ";
  271. 2890  GOTO 100
  272. 2900  HOME : NORMAL 
  273. 2910  HOME 
  274. 2920  PRINT "                                        ";
  275. 2930  PRINT "         ";: INVERSE : PRINT "EXTENDED COMMANDS MENU";: NORMAL : PRINT "         ";
  276. 2940  PRINT "                                        ";
  277. 2950  PRINT "";: INVERSE : PRINT "       A        B        C        D     ";
  278. 2960  PRINT " 1";: NORMAL : PRINT "                                      ";
  279. 2970  PRINT "";: INVERSE : PRINT " 2";: NORMAL : PRINT "                                      ";
  280. 2980  PRINT "";: INVERSE : PRINT " 3";: NORMAL : PRINT "  1-WIDTH  RESETS THE WIDTH OF THE    ";
  281. 2990  PRINT "";: INVERSE : PRINT " 4";: NORMAL : PRINT "      COLUMN THE CURSOR IS IN.        ";
  282. 3000  PRINT "";: INVERSE : PRINT " 5";: NORMAL : PRINT "  2-SAVE  SAVES ALL CONTENTS OF YOUR  ";
  283. 3010  PRINT "";: INVERSE : PRINT " 6";: NORMAL : PRINT "      SPREADSHEET TO DISK.            ";
  284. 3020  PRINT "";: INVERSE : PRINT " 7";: NORMAL : PRINT "  3-LOAD  LOADS THEM BACK AGAIN.      ";
  285. 3030  PRINT "";: INVERSE : PRINT " 8";: NORMAL : PRINT "  4-CLEAR  CLEARS THE WHOLE SPREAD-   ";
  286. 3040  PRINT "";: INVERSE : PRINT " 9";: NORMAL : PRINT "      SHEET.                          ";
  287. 3050  PRINT "";: INVERSE : PRINT "10";: NORMAL : PRINT "  5-GOTO LOCATION  MOVES THE CURSOR TO";
  288. 3060  PRINT "";: INVERSE : PRINT "11";: NORMAL : PRINT "      A GIVEN CELL LOCATION, WHICH IT ";
  289. 3070  PRINT "";: INVERSE : PRINT "12";: NORMAL : PRINT "      DISPLAYS IN THE TOP LEFT OF THE ";
  290. 3080  PRINT "";: INVERSE : PRINT "13";: NORMAL : PRINT "      SCREEN.                         ";
  291. 3090  PRINT "";: INVERSE : PRINT "14";: NORMAL : PRINT "  6-PRINT  SENDS ALL OR A PART OF THE ";
  292. 3100  PRINT "";: INVERSE : PRINT "15";: NORMAL : PRINT "      SPREADSHEET TO THE PRINTER. YOU ";
  293. 3110  PRINT "";: INVERSE : PRINT "16";: NORMAL : PRINT "      TELL IT UPPER-LEFT AND LOWER-   ";
  294. 3120  PRINT "";: INVERSE : PRINT "17";: NORMAL : PRINT "      RIGHT CORNERS OF THE SECTION    ";
  295. 3130  PRINT "";: INVERSE : PRINT "18";: NORMAL : PRINT "      YOU WANT PRINTED.               ";
  296. 3140  PRINT "";: INVERSE : PRINT "19";: NORMAL : PRINT "                                      ";
  297. 3150  GOTO 100
  298. 3160  HOME : INVERSE 
  299. 3170  HOME 
  300. 3180  PRINT "                                        ";
  301. 3190  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  302. 3200  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  303. 3210  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  304. 3220  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  305. 3230  PRINT " ";: NORMAL : PRINT "           *** ";: INVERSE : PRINT "THE";: NORMAL : PRINT "  ";: INVERSE : PRINT "END";: NORMAL : PRINT " ***           ";: INVERSE : PRINT " ";
  306. 3240  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  307. 3250  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  308. 3260  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  309. 3270  PRINT " ";: NORMAL : PRINT "      GOOD LUCK AND HAVE FUN WITH     ";: INVERSE : PRINT " ";
  310. 3280  PRINT " ";: NORMAL : PRINT "   BASICALC. YOU SHOULD BE ABLE TO    ";: INVERSE : PRINT " ";
  311. 3290  PRINT " ";: NORMAL : PRINT "   MASTER MOST OF ITS FUNCTIONS NOW   ";: INVERSE : PRINT " ";
  312. 3300  PRINT " ";: NORMAL : PRINT "   THROUGH TRIAL AND ERROR. ANY       ";: INVERSE : PRINT " ";
  313. 3310  PRINT " ";: NORMAL : PRINT "   QUESTIONS YOU MAY HAVE ABOUT THE   ";: INVERSE : PRINT " ";
  314. 3320  PRINT " ";: NORMAL : PRINT "   NORMAL OPERATIONS OF BASICALC      ";: INVERSE : PRINT " ";
  315. 3330  PRINT " ";: NORMAL : PRINT "   SHOULD HAVE BEEN ANSWERED HERE.    ";: INVERSE : PRINT " ";
  316. 3340  PRINT " ";: NORMAL : PRINT "      IF, HOWEVER, YOU HAVE FOUND A   ";: INVERSE : PRINT " ";
  317. 3350  PRINT " ";: NORMAL : PRINT "   BUG IN THE PROGRAM, GET IN TOUCH   ";: INVERSE : PRINT " ";
  318. 3360  PRINT " ";: NORMAL : PRINT "   WITH US AT SOFTALK. WE WILL DO     ";: INVERSE : PRINT " ";
  319. 3370  PRINT " ";: NORMAL : PRINT "   WHAT WE CAN TO CORRECT IT.         ";: INVERSE : PRINT " ";
  320. 3380  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  321. 3390  PRINT " ";: NORMAL : PRINT "                                      ";: INVERSE : PRINT " ";
  322. 3400  PRINT "                                        ";
  323. 3410  GOTO 100